Precision Software Appli…tions Silver Collection 1/Precision Software Applications Silver Collection Volume One (PSM) (1993).iso/demos/hrqfx31.arj/INSTALL.DAT

Text File | 1993-01-03 | 44KB | 1,351 lines

/*  install.dat         Install script for HiRes QFX 3.10

    01-03-93


  ----------------------------------------------------------------------------
                  S U B L I C E N S E   D I S C L A I M E R

    The installation program used to install the HiRes QFX programs, fonts
    and extras, INSTALL, is licensed software provided by Knowledge
    Dynamics Corporation, P.O.  Box 1558, Canyon Lake, Texas 78130-1558
    (USA). INSTALL is Copyright (c) 1987-1992 by Knowledge Dynamics
    Corporation which reserves all copyright protection worldwide.

    INSTALL is provided to you for the exclusive purpose of installing the
    HiRes QFX programs, fonts and extras.  Ron Scott, Inc.  is exclusively
    responsible for the support of HiRes QFX, including support during the
    installation phase.  In no event will Knowledge Dynamics Corporation be
    able to provide any technical support for HiRes QFX.

  -------------------------------------------------------------------------- */

@DefineProject
// @Name       = "HiRes QFX"
   @Name       = "HiRes QFX Demo"       // define for Demo, un-def above line
   @Version    = "3.10"
   @OutDrive   = C
// @SubDir     = "\\HRQ3"                   // default directory
   @SubDir     = "\\HRQ3DEMO"               // directory for Demo vers
@EndProject

@DefineVars
    @Integer @IsVista = 0                   // set = '1' to Install for ATVista
    @Integer @IsDemo = 1                    // set = '1' to Install for Demo

//  @QString @MainExe = "HRQMAIN.EXE"       // default program name
    @QString @MainExe = "HRQDEMO.EXE"       // program name for Demo vers
//  @QString @MainExe = "HRQVISTA.EXE"      // program name for ATVista vers
    @QString @ProgramLib = "PROGRAMS.RED"   // default program library
//  @QString @ProgramLib = "VISTAPGM.RED"   // program library for ATVista vers
    @QString @TabletExe = "TABLET -Q"
    @QString @BatName = "HRQ3"
//  @QString @DefaultDir = "\\HRQ3"         // default directory
    @QString @DefaultDir = "\\HRQ3DEMO"     // directory for Demo vers

    @Drive @TmpDrive
    @Integer @SpaceReqd = 12582912
    @Integer @DeleteCfg = 0
    @Integer @ChangeAdapterOnly = 0
    @Integer @InstallFontsOnly = 0
    @Integer @InstallManualOnly = 0
    @Integer @AskedOnce = 0
    @Integer @VistaGenlock = 0
    @QString @StrDrive
    @QString @CmpDrive
    @QString @ModeStr = ""
    @QString @TabletStr = ""
    @QString @TmpStr = ""
    @Drive @TPlusDrive = C
    @QString @TPlusDir = "\\TPLUS"
    @QString @Adapter = "TARGA"
@EndVars


@movecstr( 0,1,116,"                                                                              ")
@movecstr( 1,1,116,"           ██          █   ▄▄   ██▀▀▀▀▀▀▀█▄                                   ")
@movecstr( 2,1,116,"           ██          █   ▄▄   ██        █▌  ▄██▀▀▀▀█▄   ▄██▀▀▀▀▀            ")
@movecstr( 3,1,116,"           █████████████   ██   ██▄▄▄▄▄▄▄█▀  ▐██      █▌ ▐██                  ")
@movecstr( 4,1,116,"           ██          █   ██   ██       █▌  ▐██▀▀▀▀▀▀▀   ▀▀▀▀▀▀█▄            ")
@movecstr( 5,1,116,"           ██          █   ██   ██        █▌  ▀██▄▄▄▄▄▄   ▄▄▄▄▄██▀            ")
@movecstr( 6,1,116,"                                                                              ")
@movecstr( 7,1,113,"             ▄▄▄▄▄▄▄▄▄▄▄▄           ▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄   ▄▄            ▄▄      ")
@movecstr( 8,1,113,"          ▄████▀▀▀▀▀▀▀▀████▄        ███                  ▐██         ██       ")
@movecstr( 9,1,113,"       ▄███▀▀▀          ▀▀▀███▄     ███                   ▐██       ██        ")
@movecstr(10,1,113,"      ▐██▀                  ▀██▌    ███                    ▐██     ██         ")
@movecstr(11,1,113,"     ███▌                    ▐███   ███                     ▐██   ██          ")
@movecstr(12,1,113,"    ▄███                      ███▄  ███▄▄▄▄▄▄▄▄▄▄▄▄          ▐██ ██           ")
@movecstr(13,1,113,"    ███▌                      ▐███  ███                        ███            ")
@movecstr(14,1,113,"    ▀███             ██▄      ███▀  ███                       ██ ██▌          ")
@movecstr(15,1,113,"     ███▌             ▀██▄   ▐███   ███                      ██   ███         ")
@movecstr(16,1,113,"      ▐██▄              ▀██ ▄██▌    ███                     ██     ▐██        ")
@movecstr(17,1,113,"       ▀███▄▄▄          ▄▄▄███▄     ███                    ██       ▐██       ")
@movecstr(18,1,113,"          ▀████▄▄▄▄▄▄▄▄████▀ ▀██▄   ███                   ██         ▐██      ")
@movecstr(19,1,113,"             ▀▀▀▀▀▀▀▀▀▀▀▀      ▀▀▀  ▀▀▀                  ▀▀           ▀▀▀     ")
@movecstr(20,1,113,"                                                                              ")
@movecstr(21,1,113,"                                                                              ")
@movecstr(22,1,113,"                                                                              ")
@movecstr(23,1,113,"                                                                              ")

@display
@move(20,10)
@pause
@enddisplay


INSTALL_OPTIONS:

@FlushOptions()

@ChangeAdapterOnly = 0

@GetOption
    @LocalWindow(6,40)
    @if( (@InDrive == 'A') || (@InDrive == 'B') )
        @Option 100 = "Complete Installation of @Name"
        @if( @IsDemo == 0 )
            @Option 101 = "Install Program Files Only"
            @Option 102 = "Re-Install Font Files Only"
        @else
            @Option 110 = "Install Reference Manual"
        @endif
    @endif
    @Option 103 = "Change Graphics Adapter or Pointing Device"
    @Option 199 = "Un-Install @Name"
@Cls
              Select The Type Of Installation You Wish To Perform
@if( (@InDrive == 'A') || (@InDrive == 'B') )
    @if( @IsDemo == 0 )
        @move(8,10)
    √   Select "Complete Installation" if this is the first time to install
        ANY version of @Name or if you are upgrading from Version 2.0.
    √   Select "Install Program Files Only" if you are upgrading from a
        previous @Name 3.x version.
    √   Select "Re-Install Font Files Only" if you are re-installing the
        Fonts or the Font Converter program.
    @else
        @move(9,10)
    √   Select "Complete Installation" to install the @Name.
    @endif
@endif

@if( @IsDemo == 0 )
    @move(14,10)
    √   Select "Change Graphics Adapter or Pointing Device" if you have
        already installed @Name and want to change to a different
        graphics adapter or change pointing devices (mouse or data tablet).
    √   Select "Un-Install @Name" to completely remove @Name,
        all its files and sub-directories from your hard disk.
@else
    @if( (@InDrive == 'A') || (@InDrive == 'B') )
        @move(10,10)
    √   Select "Install Reference Manual" to install the PostScript(tm) file
        containing a printed copy of the @Name Reference Manual.
        Note: Do this AFTER you do the "Complete Installation".
    @endif
    @move(13,10)
    √   Select "Change Graphics Adapter or Pointing Device" if you have
        already installed @Name and want to change to a different
        graphics adapter or change pointing devices (mouse or data tablet).
    √   Select "Un-Install @Name" to remove the @Name,
        all its files and sub-directories from your hard disk.
@endif
@move(19,10)
    Use the <Up Arrow>, <Down Arrow>, <PgUp>, and <PgDn> keys to move the
    highlight bar to the desired option. Press <Enter> to select that option.
@EndOption

    // if complete or partial installation, delete HRQ.CFG
@If( 100 [= @Option || 101 [= @Option )
    @DeleteCfg = 1
@endif

@If( 102 [= @Option )
    @InstallFontsOnly = 1
@endif


LIST_DRIVES:
@ClearOption(1)
@ClearOption(2)

@GetOutDrive
        @Suppress A
        @Suppress B
        @LocalWindow(12,40)
        @Cls
@If(100 [= @Option)
    Please select the drive where you want @Name to be installed on
    your computer.
@Else
    Please select the drive where @Name is currently installed.
@EndIf

    @move(18,10)
    Use the <Up Arrow>, <Down Arrow>, <PgUp>, and <PgDn> keys to move the
    bar to your selection and then press the <Enter> key.

@EndOutDrive

@GetSubdir
    @LocalWindow(8,40)
    @Cls
@If(100 [= @Option)
    Please select the directory in which you want @Name to be
    installed.  We recommend that you select the default: @DefaultDir.
@Else
    Please select the directory where @Name is currently installed.
@EndIf

    @move(18,10)
    Press <Enter> to accept the directory displayed, or type in a
    different directory name and press <Enter>.

@EndSubdir

    //
    //  Complete Installation
    //

@If(100 [= @Option)

        // check for version 2.0

    @if( @exists( "@OutDrive:@SubDir\\proxy.exe" ) )
        @ClearOption(1)
        @ClearOption(2)
        @GetOption
            @LocalWindow(8,40)
            @Option 1 = "Start Over"
            @Option 2 = "Cancel the Installation"
            @Cls
                You cannot install @Name version @Version in the
                        same directory as version 2.0.

            @move(18,10)
    Use the <Up Arrow>, <Down Arrow>, <PgUp>, and <PgDn> keys to move the
    bar to your selection and then press the <Enter> key.
        @EndOption

        @If (1 [= @Option)
            @Goto INSTALL_OPTIONS
        @Elseif (2 [= @Option)
            @exit
        @EndIf
    @Endif

        // check for enough space for program files

    @if( @DiskFree( @OutDrive ) < 2000000 )

        @ClearOption(1)
        @ClearOption(2)
        @GetOption
            @LocalWindow(10,40)
            @Option 1 = "Select a Different Drive"
            @Option 2 = "Cancel the Installation"
            @Cls
                You do not have enough disk space on drive @OutDrive:
                             to install @Name.

                          What would you like to do?
            @move(18,10)
    Use the <Up Arrow>, <Down Arrow>, <PgUp>, and <PgDn> keys to move the
    bar to your selection and then press the <Enter> key.
        @EndOption

        @If (1 [= @Option)
            @Goto LIST_DRIVES
        @Elseif (2 [= @Option)
            @exit
        @EndIf

    @endif

        // check for enough disk space for spill files
        //  look for a DOS environment variable that names
        //  the temporary directory and if none exists
        //  assume the install drive as the temp drive

    @if( "" == "@GetEnv("TEMP")" )
        @if( "" == "@GetEnv("TMP")" )
            @StrDrive = "@OutDrive"
        @else
            @StrDrive = @StrHead( @GetEnv("TMP"), 1 )
        @endif
    @else
        @StrDrive = @StrHead( @GetEnv("TEMP"), 1 )
    @endif

        // if temp drive and install drive same,
        //  add amount req'd for programs to spill file amount

    @CmpDrive = "@OutDrive"

    @if( "@StrDrive" == "@CmpDrive" )
        @SpaceReqd = 14582912
    @endif

        // The following is a workaround since there is no fn to
        //  convert from 'string' to 'byte' and we must pass a
        //  byte value to 'DiskFree()' -- we essentially create
        //  a lookup table that maps string in 'StrDrive' to a byte value

    @if( "@StrDrive" == "A" )
        @TmpDrive = A
    @ElseIf( "@StrDrive" == "B" )
        @TmpDrive = B
    @ElseIf( "@StrDrive" == "C" )
        @TmpDrive = C
    @ElseIf( "@StrDrive" == "D" )
        @TmpDrive = D
    @ElseIf( "@StrDrive" == "E" )
        @TmpDrive = E
    @ElseIf( "@StrDrive" == "F" )
        @TmpDrive = F
    @ElseIf( "@StrDrive" == "G" )
        @TmpDrive = G
    @ElseIf( "@StrDrive" == "H" )
        @TmpDrive = H
    @ElseIf( "@StrDrive" == "I" )
        @TmpDrive = I
    @ElseIf( "@StrDrive" == "J" )
        @TmpDrive = J
    @ElseIf( "@StrDrive" == "K" )
        @TmpDrive = K
    @ElseIf( "@StrDrive" == "L" )
        @TmpDrive = L
    @ElseIf( "@StrDrive" == "M" )
        @TmpDrive = M
    @ElseIf( "@StrDrive" == "N" )
        @TmpDrive = N
    @ElseIf( "@StrDrive" == "O" )
        @TmpDrive = O
    @ElseIf( "@StrDrive" == "P" )
        @TmpDrive = P
    @ElseIf( "@StrDrive" == "Q" )
        @TmpDrive = Q
    @ElseIf( "@StrDrive" == "R" )
        @TmpDrive = R
    @ElseIf( "@StrDrive" == "S" )
        @TmpDrive = S
    @ElseIf( "@StrDrive" == "T" )
        @TmpDrive = T
    @ElseIf( "@StrDrive" == "U" )
        @TmpDrive = U
    @ElseIf( "@StrDrive" == "V" )
        @TmpDrive = V
    @ElseIf( "@StrDrive" == "W" )
        @TmpDrive = W
    @ElseIf( "@StrDrive" == "X" )
        @TmpDrive = X
    @ElseIf( "@StrDrive" == "Y" )
        @TmpDrive = Y
    @Else
        @TmpDrive = Z
    @EndIf

        // check the amount of space on the drive pointed to by
        //  TEMP or TMP, or if neither environment variable is
        //  present, on the install drive

    @if( @DiskFree( @TmpDrive ) < @SpaceReqd )

        @display
        @cls
                You do not have enough disk space on drive @TmpDrive:
                   to hold the @Name @Version "spill files".

    @Name @Version requires approximately 13 megabytes of free
    disk space to setup the minimum default spill files.

    Free up some space on that drive or edit your 'autoexec.bat' file and
    set the 'TEMP' or 'TMP' environment variable to the name of a drive and
    directory that has more space:

        Example: SET TEMP=D:\       (puts spill files in root of Drive D:)

        @move(18,10)
        @pause
        @enddisplay
        @exit

    @endif

    @goto INSTALL_FILES

@EndIf

    //
    //  Install only the Program files or the Font files and Converter,
    //  change graphics adapter and/or pointing device or un-install,
    //  or, if installing Demo, install the Reference Manual...
    //  first check to make sure the directory exists
    //

@if( @DirExists( "@OutDrive:@SubDir" ) )

        // if only changing Adapter or Pointing Device,
        //  skip the following (since we are not installing
        //  any files) and go straight to adapter selection

    @If( 103 [= @Option )
        @ChangeAdapterOnly = 1
        @goto ADAPTERS
    @EndIf

        // if un-installing, skip this section

    @If( 199 [= @Option )
        @goto UNINSTALL
    @EndIf

    @ClearOption(1)
    @ClearOption(2)
    @GetOption
        @LocalWindow(8,40)
        @Option 1 = "OK, Continue With the Installation"
        @Option 2 = "Select a Different Drive and Directory"
        @Cls
        @If(101 [= @Option)
        The @Name Program Files will be installed in the following
        drive and directory: @OutDrive:@SubDir.
        @ElseIf(110 [= @Option )
        The @Name Reference Manual will be installed in the
        following drive and directory: @OutDrive:@SubDir.
        @Else
        The @Name Font Files and Converter will be installed in the
        following drive and directory: @OutDrive:@SubDir\FONTS.
        @Endif

        @move(18,10)
    Use the <Up Arrow>, <Down Arrow>, <PgUp>, and <PgDn> keys to move the
    bar to your selection and then press the <Enter> key.
    @EndOption

    @If (1 [= @Option)
        @Goto INSTALL_FILES
    @Elseif (2 [= @Option)
            @Goto INSTALL_OPTIONS
    @EndIf
@Endif

    //
    //  If we get here, the user selected a partial install
    //  (ie. install Program or Fonts only) and the @Name
    //  directory does not exist, so tell the user about it
    //

@ClearOption(1)
@ClearOption(2)
@GetOption
    @LocalWindow(8,40)
    @Option 1 = "Select a Different Drive and Directory"
    @Option 2 = "Cancel the Installation"
    @Cls
        @Name does not appear to be installed in @OutDrive:@SubDir.

                          What would you like to do?
    @move(18,10)
    Use the <Up Arrow>, <Down Arrow>, <PgUp>, and <PgDn> keys to move the
    bar to your selection and then press the <Enter> key.
@EndOption

@If (1 [= @Option)
    @Goto INSTALL_OPTIONS
@Elseif (2 [= @Option)
        @Exit
@EndIf

    //
    //  Copy the files from the distribution disk into the
    //  target drive and directory
    //

INSTALL_FILES:

    // if Complete installation or Programs only,
    // delete old adapter-specific versions of HiRes QFX

@If( (100 [= @Option) || (101 [= @Option) )
    @Delete( "@OutDrive:@SubDir\\HRQTARGA.EXE" )
    @Delete( "@OutDrive:@SubDir\\HRQVISTA.EXE" )
    @Delete( "@OutDrive:@SubDir\\HRQVESA.EXE" )
@EndIf

@DefineDisk
    @Label = "Programs"

        // if Complete installation or Programs only,
        //  install all files in 'programs' lib

    @If( (100 [= @Option) || (101 [= @Option) )

        @BeginLib  @ProgramLib
            @File *.*
        @EndLib

            // copy INSTALL program itself and its script so user
            //  can run it to change graphics adapters
            // also copy file viewer program and 'read me' file

        @File INSTALL.EXE
        @File INSTALL.DAT
        @File VIEW.EXE
        @File README.DOC

            // copy help file, but no other extras unless a Complete install

        @BeginLib  EXTRAS.RED
            @File *.HLP
        @EndLib
    @EndIf

        // if Complete installation, do all 'extras' files

    @If( 100 [= @Option )
        @BeginLib  EXTRAS.RED
            @File HRQ.BRU   @NoOverwrite
            @File *.MNU     @NoOverwrite
            @File *.BRU     @Out BRUSHES\*.*
            @File *.COL     @Out COLORS\*.*
            @File *.FLT     @Out FILTERS\*.*
            @File *.LUT     @Out LUTS\*.*
                // if installing Demo version, fonts are in this lib
            @if( @IsDemo == 1 )
                @File *.FF1   @Out FONTS\*.*
            @endif
        @EndLib
    @endif

        // if installing Reference Manual, do all files in 'manual'

    @If( 110 [= @Option )
        @BeginLib  MANUAL.RED
            @File *.* @Size 1016642
        @EndLib
    @endif

@EndDisk

    // if a Complete installation,
    //  create the sub-directories for Lassos and Objects so that
    //  they will be there, even though we have none to install

@if( 100 [= @Option )
    @MkDir( "@OutDrive:@SubDir\\LASSOS" )
    @MkDir( "@OutDrive:@SubDir\\OBJECTS" )
@endif

    // if installing Demo version, skip 'fonts' disk since fonts
    //  are included in 'extras' lib and there is no 2nd disk

@if( @IsDemo == 1 )

        // if installing manual, skip 'adapters'
    @If( 110 [= @Option )
        @InstallManualOnly = 1
        @goto INSTALL_DONE
    @endif

    @goto ADAPTERS
@endif

    // delete old type converter program shipped w/version 3.00
@Delete( "@OutDrive:@SubDir\\FONTS\\TYPEIN.EXE" )

        // if Complete installation or Fonts only,
        //  install all Fonts and Converter

@If( (100 [= @Option) || (102 [= @Option) )

    @DefineDisk
        @Label = "Fonts"
        @BeginLib  HRQFONTS.RED
            @File *.*   @Out FONTS\*.*
        @EndLib
    @EndDisk

@EndIf

        // if Programs ony installation,
        //  install Font Converter only

@If( 101 [= @Option )
    @DefineDisk
        @Label = "Fonts"
        @BeginLib  HRQFONTS.RED
            @File *.EXE     @Out FONTS\*.*
            @File *.DAT     @Out FONTS\*.*
            @File *.HLP     @Out FONTS\*.*
        @EndLib
    @EndDisk
@EndIf

@if( @InstallFontsOnly == 1 )
    @goto INSTALL_DONE
@endif

@goto ADAPTERS

    // un-install HiRes QFX by deleting all files and removing directories

UNINSTALL:

@FlushOptions()

@ClearOption(1)
@ClearOption(2)
@GetOption
    @LocalWindow(12,40)
    @Option 1 = "Yes, Un-Install @Name"
    @Option 2 = "No, Cancel the Un-Install"
@Cls
        You Have Chosen to Un-Install @Name.
        ▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀
        This will delete all the Program Files and all Fonts, Lassos,
        Objects, Brushes, Color Palettes, Lookup Tables and Custom Filters
        that are stored in @OutDrive:@SubDir and its sub-directories!

               Please confirm that this is what you want to do.
@move(18,10)
    Use the <Up Arrow>, <Down Arrow>, <PgUp>, and <PgDn> keys to move the
    highlight bar to either choice.  Press <Enter> to select that choice.
@EndOption

@If( 1 [= @Option )
    @Delete( "@OutDrive:@SubDir\\LASSOS\\*.*" )
    @Delete( "@OutDrive:@SubDir\\OBJECTS\\*.*" )
    @Delete( "@OutDrive:@SubDir\\BRUSHES\\*.*" )
    @Delete( "@OutDrive:@SubDir\\COLORS\\*.*" )
    @Delete( "@OutDrive:@SubDir\\FILTERS\\*.*" )
    @Delete( "@OutDrive:@SubDir\\LUTS\\*.*" )
    @Delete( "@OutDrive:@SubDir\\FONTS\\*.*" )

    @RmDir( "@OutDrive:@SubDir\\LASSOS" )
    @RmDir( "@OutDrive:@SubDir\\OBJECTS" )
    @RmDir( "@OutDrive:@SubDir\\BRUSHES" )
    @RmDir( "@OutDrive:@SubDir\\COLORS" )
    @RmDir( "@OutDrive:@SubDir\\FILTERS" )
    @RmDir( "@OutDrive:@SubDir\\LUTS" )
    @RmDir( "@OutDrive:@SubDir\\FONTS" )

    @Delete( "@OutDrive:@SubDir\\*.*" )
    @RmDir( "@OutDrive:@SubDir" )
@endif

@exit


    //
    //  Choose the type of graphics adapter and mode
    //

ADAPTERS:

    // if installing ATVista version, skip adapter selection

@if( (@IsVista == 1) && (@IsDemo == 0) )
    @Goto ADAPT_VISTA
@endif

@FlushOptions()

@GetOption
    @LocalWindow(7,40)
    @Option 200 = "TARGA Classic (16, 24 or 32)"
    @Option 201 = "TARGA Plus (all models)"
    @if( @IsDemo == 1 )
        @Option 202 = "ATVista (4 meg or better)"
    @endif
    @Option 203 = "Super VGA (VESA 1.2 compliant*)"
    @Option 204 = "Truevision TV1024-32"
    @Option 299 = "None, Cancel the Installation)"
    @Cls
                Select The Graphics Adapter @Name Will Use

    @move(13,10)
    *   Super VGA adapters must support a suitable Direct Color mode.
        These adapters are sometimes referred to as "High Color" adapters.
        They also must support VESA Bios Extensions version 1.2 or better.


    Use the <Up Arrow>, <Down Arrow>, <PgUp>, and <PgDn> keys to move the
    highlight bar to the type of graphics adapter to use.  Press <Enter> to
    select that type of adapter.
@EndOption


@If (200 [= @Option)
    @Goto ADAPT_TARGA
@Elseif (201 [= @Option)
    @Goto ADAPT_TPLUS
@Elseif (202 [= @Option)
    @Goto ADAPT_VISTA
@Elseif (203 [= @Option)
    @Goto ADAPT_VESA
@Elseif (204 [= @Option)
    @Goto ADAPT_TV1024
@Else
    @Exit
@EndIf

    //
    // TARGA Classic graphics adapter installation
    //

ADAPT_TARGA:

@goto POINTING_DEVICES


    //
    // TARGA Plus graphics adapter installation
    //

ADAPT_TPLUS:

@Adapter = "TPLUS"

@FlushOptions()

@GetOption
    @LocalWindow(10,40)
    @Option 300 = "NTSC 512x486x16 interlaced         "
    @Option 301 = "NTSC 512x486x16 non-interlaced     "
    @Option 302 = "NTSC 512x486x32 interlaced         "
    @Option 303 = "NTSC 512x486x32 non-interlaced     "
    @Option 304 = "PAL  512x576x16 interlaced         "
    @Option 305 = "PAL  512x576x16 non-interlaced     "
    @Option 306 = "PAL  512x576x32 interlaced         "
    @Option 307 = "PAL  512x576x32 non-interlaced     "
    @Option 308 = "NTSC 640x480x16 interlaced         "
    @Option 309 = "NTSC 640x480x16 non-interlaced     "
    @Option 310 = "NTSC 648x486x16 interlaced         "
    @Option 311 = "NTSC 648x486x16 non-interlaced     "
    @Option 312 = "NTSC 720x486x16 interlaced         "
    @Option 313 = "NTSC 720x486x16 non-interlaced     "
    @Option 314 = "PAL  720x576x16 interlaced         "
    @Option 315 = "PAL  720x576x16 non-interlaced     "
    @Option 316 = "NTSC 756x486x16 interlaced         "
    @Option 317 = "NTSC 756x486x16 non-interlaced     "
    @Option 318 = "PAL  768x576x16 interlaced         "
    @Option 319 = "PAL  768x576x16 non-interlaced     "
    @Option 320 = "HiRes 800x600x16 interlaced        "
    @Option 321 = "HiRes 1024x768x16 interlaced       "
    @Option 322 = "VGA Compatible 512x496x16"
    @Option 323 = "VGA Compatible 640x496x16"
    @Option 324 = "VGA Compatible 512x496x32"
    @Cls
                 Select The TARGA Plus Mode @Name Will Use

    @move(18,10)
    Use the <Up Arrow>, <Down Arrow>, <PgUp>, and <PgDn> keys to move the
    highlight bar to the TARGA Plus mode to use.  Press <Enter> to select
    that mode.
@EndOption

@If( 300 [= @Option )
    @TmpStr = "TMODE  9"
@ElseIf( 301 [= @Option )
    @TmpStr = "TMODE 10"
@ElseIf( 302 [= @Option )
    @TmpStr = "TMODE 11"
@ElseIf( 303 [= @Option )
    @TmpStr = "TMODE 12"
@ElseIf( 304 [= @Option )
    @TmpStr = "TMODE 13"
@ElseIf( 305 [= @Option )
    @TmpStr = "TMODE 14"
@ElseIf( 306 [= @Option )
    @TmpStr = "TMODE 15"
@ElseIf( 307 [= @Option )
    @TmpStr = "TMODE 16"
@ElseIf( 308 [= @Option )
    @TmpStr = "TMODE 17"
@ElseIf( 309 [= @Option )
    @TmpStr = "TMODE 18"
@ElseIf( 310 [= @Option )
    @TmpStr = "TMODE 19"
@ElseIf( 311 [= @Option )
    @TmpStr = "TMODE 20"
@ElseIf( 312 [= @Option )
    @TmpStr = "TMODE 21"
@ElseIf( 313 [= @Option )
    @TmpStr = "TMODE 22"
@ElseIf( 314 [= @Option )
    @TmpStr = "TMODE 23"
@ElseIf( 315 [= @Option )
    @TmpStr = "TMODE 24"
@ElseIf( 316 [= @Option )
    @TmpStr = "TMODE 25"
@ElseIf( 317 [= @Option )
    @TmpStr = "TMODE 26"
@ElseIf( 318 [= @Option )
    @TmpStr = "TMODE 27"
@ElseIf( 319 [= @Option )
    @TmpStr = "TMODE 28"
@ElseIf( 320 [= @Option )
    @TmpStr = "TMODE 29"
@ElseIf( 321 [= @Option )
    @TmpStr = "TMODE 30"
@ElseIf( 322 [= @Option )
    @TmpStr = "TMODE 33"
@ElseIf( 323 [= @Option )
    @TmpStr = "TMODE 34"
@Else
    @TmpStr = "TMODE 36"
@EndIf

    // look for 'TMODE' program in default 'C:\TPLUS' drive and directory
    //  and if not found, ask user where it is

FIND_TMODE:

@if( @exists( "@TPlusDrive:@TPlusDir\\tmode.exe" ) )

    @ModeStr = "@TPlusDrive:@TPlusDir\\@TmpStr"

    @goto POINTING_DEVICES
@else

    @if( @AskedOnce == 1 )
        @goto NO_TMODE
    @endif

        // could not find 'tmode', ask for drive

    @TmpDrive = @OutDrive
    @GetOutDrive
        @Suppress A
        @Suppress B
        @LocalWindow(13,40)
        @Cls
    The INSTALL program needs to know the drive in which the "@TPlusDir "
    directory is located. This is the directory where the TARGA Plus
    utility programs are located. This will allow INSTALL to add a line to
    the startup batch file that will set the TARGA Plus mode automatically
    each time you start @Name. Please select the drive from the list.

    @move(18,10)
    Use the <Up Arrow>, <Down Arrow>, <PgUp>, and <PgDn> keys to move the
    bar to your selection and then press the <Enter> key.
    @EndOutDrive

    @TPlusDrive = @OutDrive
    @OutDrive = @TmpDrive

    @AskedOnce = 1

    @goto FIND_TMODE

@endif

NO_TMODE:

@FlushOptions()
@GetOption
    @LocalWindow(12,40)
    @Option 1 = "Try Selecting Another Drive"
    @Option 2 = "Do Not Set TARGA Plus Mode Automatically"
    @Option 3 = "Cancel the Installation"
    @Cls
        INSTALL could not locate the "TMODE.EXE" program in the @TPlusDir
        directory on drive @TPlusDrive:. If the INSTALL program cannot locate this
        program, it cannot set the TARGA Plus operating mode automatically.

                          What would you like to do?
    @move(18,10)
    Use the <Up Arrow>, <Down Arrow>, <PgUp>, and <PgDn> keys to move the
    bar to your selection and then press the <Enter> key.
@EndOption

@If (1 [= @Option)
    @AskedOnce = 0
    @Goto FIND_TMODE
@Elseif (2 [= @Option)
    @ModeStr = ""
    @goto POINTING_DEVICES
@Else
    @exit
@EndIf

@goto POINTING_DEVICES


    //
    // ATVista graphics adapter installation
    //

ADAPT_VISTA:

@Adapter = "VISTA"

@FlushOptions()

@GetOption
    @LocalWindow(10,40)
    @Option 400 = "NTSC 512x482 interlaced            "
    @Option 401 = "NTSC 512x482 non-interlaced        "
    @Option 402 = "NTSC 512x486 interlaced            "
    @Option 403 = "NTSC 512x486 non-interlaced        "
    @Option 404 = "NTSC 604x486 interlaced            "
    @Option 405 = "NTSC 604x486 non-interlaced        "
    @Option 406 = "NTSC 640x486 interlaced            "
    @Option 407 = "NTSC 640x486 non-interlaced        "
    @Option 408 = "NTSC 646x486 intlcd - 12.2 mhz xtal"
    @Option 409 = "NTSC 720x486 intlcd - 13.5 mhz xtal"
    @Option 410 = "NTSC 720x486 non-intlcd -   "      "
    @Option 411 = "NTSC 756x486 interlaced            "
    @Option 412 = "NTSC 756x486 non-interlaced        "
    @Option 413 = "NTSC 1008x486 interlaced           "
    @Option 414 = "NTSC 1512x486 interlaced           "
    @Option 415 = "PAL 592x578 interlaced             "
    @Option 416 = "PAL 640x486 interlaced             "
    @Option 417 = "PAL 640x486 non-interlaced         "
    @Option 418 = "PAL 720x578 intlcd - 13.5 mhz xtal "
    @Option 419 = "PAL 720x578 non-intlcd -   "       "
    @Option 420 = "PAL 740x578 interlaced             "
    @Option 421 = "PAL 740x578 non-interlaced         "
    @Option 422 = "PAL 986x578 interlaced             "
    @Option 423 = "PAL 1480x578 interlaced            "
    @Option 424 = "HiRes 1024x768 interlaced high-res "
    @Option 425 = "HiRes 1024x856 interlaced high-res "
    @Cls
                   Select The ATVisa Mode @Name Will Use

    @move(18,10)
    Use the <Up Arrow>, <Down Arrow>, <PgUp>, and <PgDn> keys to move the
    highlight bar to the ATVista mode to use.  Press <Enter> to select
    that mode.
@EndOption

@If( 400 [= @Option )
    @ModeStr =              "SET DISPLAYCFG=dh512 dv482 ah512 av482"
@ElseIf( 401 [= @Option )
    @ModeStr =              "SET DISPLAYCFG=dh512 dv482 ah512 av482 n"
@ElseIf( 402 [= @Option )
    @ModeStr =              "SET DISPLAYCFG=dh512 dv486 ah512 av486"
@ElseIf( 403 [= @Option )
    @ModeStr =              "SET DISPLAYCFG=dh512 dv486 ah512 av486 n"
@ElseIf( 404 [= @Option )
    @ModeStr =              "SET DISPLAYCFG=dh604 dv486 ah604 av486"
@ElseIf( 405 [= @Option )
    @ModeStr =              "SET DISPLAYCFG=dh604 dv486 ah604 av486 n"
@ElseIf( 406 [= @Option )
    @ModeStr =              "SET DISPLAYCFG=dh640 dv486 ah640 av486"
@ElseIf( 407 [= @Option )
    @ModeStr =              "SET DISPLAYCFG=dh640 dv486 ah640 av486 n"
@ElseIf( 408 [= @Option )
    @ModeStr =              "SET DISPLAYCFG=dh646 dv486 ah646 av486"
@ElseIf( 409 [= @Option )
    @ModeStr =              "SET DISPLAYCFG=dh720 dv486 ah720 av486"
@ElseIf( 410 [= @Option )
    @ModeStr =              "SET DISPLAYCFG=dh720 dv486 ah720 av486 n"
@ElseIf( 411 [= @Option )
    @ModeStr =              "SET DISPLAYCFG=dh756 dv486 ah756 av486"
@ElseIf( 412 [= @Option )
    @ModeStr =              "SET DISPLAYCFG=dh756 dv486 ah756 av486 n"
@ElseIf( 413 [= @Option )
    @ModeStr =              "SET DISPLAYCFG=dh1008 dv486 ah1008 av486"
@ElseIf( 414 [= @Option )
    @ModeStr =              "SET DISPLAYCFG=dh1512 dv486 ah1512 av486"
@ElseIf( 415 [= @Option )
    @ModeStr =              "SET DISPLAYCFG=dh592 dv578 ah592 av578 p"
@ElseIf( 416 [= @Option )
    @ModeStr =              "SET DISPLAYCFG=dh640 dv486 ah640 av486 p"
@ElseIf( 417 [= @Option )
    @ModeStr =              "SET DISPLAYCFG=dh640 dv486 ah640 av486 p n"
@ElseIf( 418 [= @Option )
    @ModeStr =              "SET DISPLAYCFG=dh720 dv578 ah720 av578 p"
@ElseIf( 419 [= @Option )
    @ModeStr =              "SET DISPLAYCFG=dh720 dv578 ah720 av578 p n"
@ElseIf( 420 [= @Option )
    @ModeStr =              "SET DISPLAYCFG=dh740 dv578 ah740 av578 p"
@ElseIf( 421 [= @Option )
    @ModeStr =              "SET DISPLAYCFG=dh740 dv578 ah740 av578 p n"
@ElseIf( 422 [= @Option )
    @ModeStr =              "SET DISPLAYCFG=dh986 dv578 ah986 av578 p"
@ElseIf( 423 [= @Option )
    @ModeStr =              "SET DISPLAYCFG=dh1480 dv578 ah1480 av578 p"
@ElseIf( 424 [= @Option )
    @ModeStr =              "SET DISPLAYCFG=dh1024 dv768 ah1024 av768"
@Else
    @ModeStr =              "SET DISPLAYCFG=dh1024 dv856 ah1024 av856"
@EndIf

@FlushOptions()
@GetOption
    @LocalWindow(8,40)
    @Option 1 = "32 Bits Per Pixel"
    @Option 2 = "16 Bits Per Pixel"
    @Cls
         At which "bit depth" do you want to run your ATVista adapter?
    @move(18,10)
    Use the <Up Arrow>, <Down Arrow>, <PgUp>, and <PgDn> keys to move the
    bar to your selection and then press the <Enter> key.
@EndOption

@If (1 [= @Option)
    @ModeStr = "@ModeStr s32"
@Else
    @ModeStr = "@ModeStr s16"
@EndIf

@FlushOptions()
@ClearOption(1)
@GetOption
    @Checkbox
    @LocalWindow(8,40)
    @Option 1 = "Genlock On"
    @Cls
          Do you want Genlock on when you run your ATVista adapter?
    @move(18,10)
            Press the <Spacebar> key to toggle from "No" to "Yes".
                   Press <Enter> to confirm your selection.
@EndOption

@If (1 [= @Option)
    @ModeStr = "@ModeStr g1"
    @VistaGenlock = 1
@EndIf

@FlushOptions()
@GetOption
    @LocalWindow(12,40)
    @Option 1 = "Input Gamma 1.0"
    @Option 2 = "Input Gamma 1.2"
    @Option 3 = "Input Gamma 1.5"
    @Option 4 = "Input Gamma 1.8"
    @Option 5 = "Input Gamma 2.0"
    @Option 6 = "Input Gamma 2.1"
    @Option 7 = "Input Gamma 2.2"
    @Cls
          Select the Input Gamma for the ATVista. This affects video
          grabbing or digitizing ONLY. We recommend that you choose a
          gamma of 1.0. Output Gamma (which affects the image displayed
          on the monitor) is controlled from within @Name via the
          GAMMA button on the Main Preferences dialog.

    @move(18,10)
    Use the <Up Arrow>, <Down Arrow>, <PgUp>, and <PgDn> keys to move the
    bar to your selection and then press the <Enter> key.
@EndOption

@If (1 [= @Option)
    @ModeStr = "@ModeStr ig1.0"
@ElseIf (2 [= @Option)
    @ModeStr = "@ModeStr ig1.2"
@ElseIf (3 [= @Option)
    @ModeStr = "@ModeStr ig1.5"
@ElseIf (4 [= @Option)
    @ModeStr = "@ModeStr ig1.8"
@ElseIf (5 [= @Option)
    @ModeStr = "@ModeStr ig2.0"
@ElseIf (6 [= @Option)
    @ModeStr = "@ModeStr ig2.1"
@Else
    @ModeStr = "@ModeStr ig2.2"
@EndIf

@ModeStr = "@ModeStr og1.0"

@goto POINTING_DEVICES


    //
    // VESA Super VGA graphics adapter installation
    //

ADAPT_VESA:

@Adapter = "VESA"

@FlushOptions()

@GetOption
    @LocalWindow(12,40)
    @Option 500 = "640 x 480    32K     (1:5:5:5)    [110]"
    @Option 501 = "640 x 480    64K     (5:6:5)      [111]"
    @Option 502 = "640 x 480    16.8M   (8:8:8)      [112]"
    @Option 503 = "800 x 600    32K     (1:5:5:5)    [113]"
    @Option 504 = "800 x 600    64K     (5:6:5)      [114]"
    @Option 505 = "800 x 600    16.8M   (8:8:8)      [115]"
    @Option 506 = "1024 x 768   32K     (1:5:5:5)    [116]"
    @Option 507 = "1024 x 768   64K     (5:6:5)      [117]"
    @Option 508 = "1024 x 768   16.8M   (8:8:8)      [118]"
    @Option 509 = "1280 x 1024  32K     (1:5:5:5)    [119]"
    @Option 510 = "1280 x 1024  64K     (5:6:5)      [11a]"
    @Option 511 = "1280 x 1024  16.8M   (8:8:8)      [11b]"
    @Option 599 = "??? Don't know, let HiRes QFX pick mode"
    @Cls
                 Select The Super VGA Mode @Name Will Use

                  Resolution   Colors  (bits/plane) [VESA Mode]

    @move(18,10)
    Use the <Up Arrow>, <Down Arrow>, <PgUp>, and <PgDn> keys to move the
    highlight bar to the Super VGA mode to use.  Press <Enter> to select
    that mode.
@EndOption

@If( 500 [= @Option )
    @ModeStr =              "SET HRQVESA=110"
@ElseIf( 501 [= @Option )
    @ModeStr =              "SET HRQVESA=111"
@ElseIf( 502 [= @Option )
    @ModeStr =              "SET HRQVESA=112"
@ElseIf( 503 [= @Option )
    @ModeStr =              "SET HRQVESA=113"
@ElseIf( 504 [= @Option )
    @ModeStr =              "SET HRQVESA=114"
@ElseIf( 505 [= @Option )
    @ModeStr =              "SET HRQVESA=115"
@ElseIf( 506 [= @Option )
    @ModeStr =              "SET HRQVESA=116"
@ElseIf( 507 [= @Option )
    @ModeStr =              "SET HRQVESA=117"
@ElseIf( 508 [= @Option )
    @ModeStr =              "SET HRQVESA=118"
@ElseIf( 509 [= @Option )
    @ModeStr =              "SET HRQVESA=119"
@ElseIf( 510 [= @Option )
    @ModeStr =              "SET HRQVESA=11a"
@ElseIf( 511 [= @Option )
    @ModeStr =              "SET HRQVESA=11b"
@Else
    @ModeStr =              "SET HRQVESA=0"
@EndIf


@goto POINTING_DEVICES

    //
    // Truevision TV1024-32 graphics adapter installation
    //

ADAPT_TV1024:

@Adapter = "TV1024"

@FlushOptions()

@GetOption
    @LocalWindow(11,40)
    @Option 610 = " 640 x 480  60Hz  Non-interlaced"
    @Option 609 = " 800 x 600  60Hz  Non-interlaced"
    @Option 600 = " 756 x 486  NTSC  Interlaced"
    @Option 601 = " 720 x 486  NTSC  Interlaced"
    @Option 602 = " 640 x 480  NTSC  Interlaced"
    @Option 603 = " 768 x 576  PAL   Interlaced"
    @Option 604 = " 720 x 576  PAL   Interlaced"
    @Option 605 = "1024 x 768  60Hz  Non-interlaced"
    @Option 606 = "1024 x 768  72Hz  Non-interlaced"
    @Option 607 = "1024 x 768  76Hz  Non-interlaced"
    @Option 608 = "1024 x 768  87Hz  Interlaced"
    @Cls

                 Select The TV1024-32 Mode @Name Will Use

    @move(18,10)
    Use the <Up Arrow>, <Down Arrow>, <PgUp>, and <PgDn> keys to move the
    highlight bar to the Super VGA mode to use.  Press <Enter> to select
    that mode.
@EndOption

@If( 600 [= @Option )
    @Adapter =              "@Adapter,0"
@ElseIf( 601 [= @Option )
    @Adapter =              "@Adapter,1"
@ElseIf( 602 [= @Option )
    @Adapter =              "@Adapter,2"
@ElseIf( 603 [= @Option )
    @Adapter =              "@Adapter,3"
@ElseIf( 604 [= @Option )
    @Adapter =              "@Adapter,4"
@ElseIf( 605 [= @Option )
    @Adapter =              "@Adapter,5"
@ElseIf( 606 [= @Option )
    @Adapter =              "@Adapter,6"
@ElseIf( 607 [= @Option )
    @Adapter =              "@Adapter,7"
@ElseIf( 608 [= @Option )
    @Adapter =              "@Adapter,8"
@ElseIf( 609 [= @Option )
    @Adapter =              "@Adapter,9"
@Else
    @Adapter =              "@Adapter,10"
@EndIf

@ClearOption(1)
@GetOption
    @Checkbox
    @LocalWindow(6,40)
    @Option 1 = "Dual Monitor Display"
    @Cls
            Are you using the TV1024-32 in a 'dual monitor' setup?

    @move(8,10)
        In a dual monitor setup, one monitor is used for the TV1024-32
        and a second is used for the computer (VGA) display.  If you
        select "Yes", HiRes QFX will preserve the TV1024-32 image on
        exit or when an external program is run from the User menu.
        If you are using the TV1024-32 for video applications and have
        a separate VGA adapter for the computer, select "Yes".

        If you have only one monitor and are using the TV1024-32
        internal VGA adapter, select "No".

    @move(18,10)
            Press the <Spacebar> key to toggle from "No" to "Yes".
                   Press <Enter> to confirm your selection.
@EndOption

@If (1 [= @Option)
    @Adapter = "@Adapter,1"
@EndIf


@goto POINTING_DEVICES

    //
    // Select pointing device (mouse, data tablet)
    //

POINTING_DEVICES:

@FlushOptions()

@GetOption
    @LocalWindow(8,40)
    @Option 2000 = "Microsoft Compatible Mouse"
    @Option 2001 = "GTCO Bit Pad One Data Tablet"
    @Option 2002 = "Summagraphics 9 inch Data Tablet"
    @Option 2003 = "Summagraphics 12 inch Data Tablet"
    @Option 2004 = "Summagraphics MM1812 Data Tablet"
    @Option 2005 = "WACOM Tablet in Non-pressure Mode"
    @Option 2006 = "WACOM Tablet in Pressure Mode"
    @Cls
                 Select The Pointing Device @Name Will Use

    @move(18,10)
    Use the <Up Arrow>, <Down Arrow>, <PgUp>, and <PgDn> keys to move the
    highlight bar to the mouse or tablet to use.  Press <Enter> to select
    that device.
@EndOption

@If( 2000 [= @Option )
    @TabletStr =            "SET QTAB=-1"
@ElseIf( 2001 [= @Option )
    @TabletStr =            "SET QTAB=0"
@ElseIf( 2002 [= @Option )
    @TabletStr =            "SET QTAB=1"
@ElseIf( 2003 [= @Option )
    @TabletStr =            "SET QTAB=2"
@ElseIf( 2004 [= @Option )
    @TabletStr =            "SET QTAB=3"
@ElseIf( 2005 [= @Option )
    @TabletStr =            "SET QTAB=4"
@Else
    @TabletStr =            "SET QTAB=5"
@EndIf

    // if more than one serial port, ask which one

@if( @ComTotal > 1 )
    @if( "@TabletStr" != "SET QTAB=-1" )
        @FlushOptions()
        @GetOption
            @LocalWindow(8,40)
            @Option 1 = "Serial Port COM1"
            @Option 2 = "Serial Port COM2"
            @Cls
         Your data tablet is is connected to which serial (COM) port?
            @move(18,10)
        Use the <Up Arrow>, <Down Arrow>, <PgUp>, and <PgDn> keys to move the
        bar to your selection and then press the <Enter> key.
        @EndOption

        @If (2 [= @Option)
            @TabletStr = "@TabletStr;2"
        @EndIf
    @endif
@endif

MAKE_BATCHFILE:

@Write( "@OutDrive:@SubDir\\@BatName.bat", "wt", "@@ECHO OFF\n")
@Write( , , "@TabletStr\n")
@Write( , , "SET HRQADAPT=@Adapter\n")
@if( "@ModeStr" != "" )
    @Write( , , "@ModeStr\n")
@endif
@Write( , , "@OutDrive:\n")
@Write( , , "CD @SubDir\n")
@if( @VistaGenlock == 1 )
    @Write( , , "VISTALD GENON.OUT\n")
@endif
@Write( , , "@TabletExe\n")
@Write( , , "@MainExe %1\n")


INSTALL_DONE:

@Finish
    @ChDrive @OutDrive
    @ChDir "@SubDir"

    @if( @InstallManualOnly == 1 )
        @Cls
        The PostScript(tm) files containing the @Name Reference
        Manual have been copied to your hard disk.

        To print the Reference Manual on a PostScript printer:
        ------------------------------------------------------

        1.  Switch to the directory where the Reference Manual file is
            installed.
                Example: @OutDrive:
                         CD @SubDir

        2.  Copy the files to a PostScript printer.
                Example: COPY *.PS LPT1:

        The file README.DOC contains additional information on printing
        the manual, including what size paper is required and how many
        sheets of paper are needed.

        @pause

        @goto FINISH_EXIT
    @endif

    @if( @DeleteCfg == 1 )
        @Delete( "HRQ.OLD" )
        @Rename( "HRQ.CFG", "HRQ.OLD" )
        @Delete( "HRQ.CFG" )
    @endif

    @Cls

    The installation of @Name is now complete.

    @if( @exists( "@OutDrive:@SubDir\\README.DOC" ) &&
                                            @ChangeAdapterOnly == 0 &&
                                                    @InstallFontsOnly == 0 )
        When you are ready to read the README file,
        @Pause
        @Spawn( "VIEW README.DOC" )
        @Cls
    @endif

    Type '@BatName' and press <Enter> to Run @Name.

    @Pause

FINISH_EXIT:

@EndFinish